SPEECH SYNTHESIZER FOR TIMEX 2068 


"This speech synthesizer system for the TIMEX 2068 computer is a software utility 
-which allows you to write your own talking BASIC programs. Nine programs are 
included on the cassette. Six of these are libraries of words from which 
sentences can be compiled. There will be a BASIC program and a word library in 
all talking programs that you will write. 


The first thing you should do is break out the cassette's recording tabs to avoid 
accidental erasure. It is also recommended that you go through the tape and write 
down the tape counter readings for each program - provided you have a tape 
counter. The programs on SIDE 1 are: "DEMO", "DEMLIB" CODE, "COMPILE", SPKSUB", 
"NUMLIB" CODE, AND "LIB4" CODE. On SIDE 2: "LIB3" CODE, "LIB2" CODE, and "LIB1" 
CODE. This will save you time in getting from one program to another. Also be 
sure to put the machine in CAP-LOCK mode by pressing (CAPS SHIFT) (2). This is 
required because the program names on tape are capitalized, lower case will not 
be recognized. 

To run the DEMO program, ENTER: 

LOAD "DEMO": LOAD "DEMLIB"CODE: RUN 
(CODE is a KEYWORD found by pressing (CAPS SHIFT) (SYMBL SHIFT) and the (I) Key). 
The domonstration will begin. 


After hearing the DEMO, you may experiment with the vocabulary by entering the 
following lines: 
LET NO=1: GO SUB 4002 
LET NO=2: GO SUB 4002 
Try the following: 
GO SUB 2000. When prompted "ENTER SENTENCE TO BE SPOKEN" type 135 25 16 222 
74 and ENTER. Now ENTER this line: 
LET I=135: LET AM=25: LET A=16: LET STUPID=222: LET COMPUTER=74: GO SUB 
2000. When prompted "ENTER THE SENTENCE TO BE SPOKEN" type I AM A STUPID 
COMPUTER and ENTER. Now ENTER this line: 
l GO SUB 3000 
What you have just heard is the entire library currently residing in the 
computer. Note that the computer can only speak a word from the library that is 
in the machine. If a desired word is not in the library, you will have to use the 
COMPILE program to create a new library. This will be described later in the WALK 
THROUGHT THE COMPILE PROGRAM section. 


In order to write BASIC programs which talk, you need to know the following 
things: l 

SPKSUB is a subroutine you will need to include in your BASIC programs. Lines 
2000 to 2060 can be used for speaking sentences. Lines 3000 to 3070 can be used 
to hear and see the words in the library currently residing in the machine. Lines 
4000 to 4005 are used for speaking individual words. 


COMPILE is a program used to create your own libraries from the four main 
libraries on the program tape. 


Now you can write a simple BASIC program by entering the following lines: 

DELETE 1,110: DELETE 5000, 

LIST 
What you should see is the SPKSUB subroutine (This is the same subroutine you 
will use in your own programs). Add the following lines: 

10 LET S$="A STUPID COMPUTER AM I" 

20 GO SUB 2010. DO NOT ENTER RUN. This will erase the varibles that you 
assigned a few minutes ago. Instead ENTER: GO TO 10. This is because variable 
names must be assigned to the corresponding numbers (listed in word libraries). 
Add the following lines: 

5 LET YOU=273: LET ARE=34: LET RIGHT=200: LET I=135: LET AM=25: LET A=16: 


LET COMPUTER=74 
10 LET S$="YOU ARE RIGHT I AM A COMPUTER" 


RUN the program again. Afterwards, rearrange the sentence as you wish and reRUN 
it. 

By now you should have ageneral idea of how to: write BASIC programs with the 
SPKSUB subroutine; assign variable names; speak sentences by GO SUB 2010, hear 
and see the resident library by GO SUB 3000, and speak individual words by GO SUB 


4000. 
A WALK THROUGH THE COMPILE PROGRAM 


The COMPILE program allows you to customize libraries from the four main 
libraries on the program cassette. Follow these steps to familiarize yourself 
with the COMPILE program. This is the same procedure you will follow to create 
your own libraries for your talking programs. 


Our objective is to speak the sentence "The year is Nineteen Eighty Six and my 
machine can now talk to me". First ENTER: 
LOAD "COMPILE": LOAD "LIB4" CODE: RUN 

By looking on the vocabulary list, we can find the numbers of the words we are 
going to use: 231 272 139 9 14 80 6 27 170 155 63 177 225 2 160. In this example, 
words are to be taken from all four main libraries (LIBl - LIB4). The COMPILE 
program always starts with the library that is in memory (in this case LIB4). You 
will be asked 'ENTER # OF LIBRARIES YOU PLAN TO TAKE WORDS FROM'. since we are 
using all four main libraries, ENTER 4. Next you will be asked 'DO YOU WANT A 
LISTING OF THE LIBRARY CURRENTLY IN MEMORY?'. ENTER N. If you enter 'Y', the 
entire library will be spoken. We now have LIB4 in memory and wish to take the 
words from our list out of it. Checking our list and the vocabulary sheet we find 
that 231,272, and 225 are in LIB4. Enter these at the prompt 'ENTER # OF WORD, 
'N' TO END'. When you have entered all three numbers, ENTER N. After a few 
seconds, a flashing "PREPARE TO SAVE" message will appear - Insert a blank 
workspace tape and press RECORD. With the tape rolling, press a key. When the 
save has finished, stop the tape and remove it. The message 'READY TO LOAD 
LIBRARY' will appear. Insert the program tape (side 2) and load LIB3. the words 
from our list that are in this library are: 139,177,170,155,160. Enter these as 
before and end by entering'N'. Insert your workspace tape which should be in the 
same position that it was after the last save, and save this set as you did 
before. Remove your workspace tape and insert the program tape again to load 
LIB2. The only word that we need from this library is 80. Enter 80 and 'N' as 
before. Insert you workspace tape and save this set as before. Insert program 
tape to load LIBl, enter the remaining numbers: 9,14,6,27,63,2,N, and save this 
set as before. Now rewind the wordspace tape and press play. This will load back 
each of the segments that we created and combine them to form a new library 
called 'NEWLIB'. When all segments have been loaded, you will be prompted to save 
the final library. 


Now that we have created our new library, we can write a BASIC program to use it. 
Try this: 

NEW 

LOAD "SPKSUB" (from program tape) 

LOAD " NEWLIB" CODE (from workspace tape) 

10 LET S$="231 272 139 9 14 80 6 27 170 155 63 177 225 2 160" 

20 GOSUB 2010 

30 GOTO 10 

RUN 
You can follow up by assigning variable to each number as did in the previous 


example if you so desire. 


REM #88 DEMO PROGRAM (c)1984 SPEECH SYNTHESIZ 


ii PRINT AT 14,14; FLASH 1; "ATTENTION" 

i2 RESTORE 

15 GÜ SUB 8999: GÜ SUB 8999: PAUSE 26 

2% GO SUB 8999: GÜ SUB 98999 

Sö FOR X=i TÜ 2: READ NO: 60 SUB 4992: NEXT X: PAUSE 45 

31 CLS : PRINT "LISTEN AND WATCH THE DISPLAY AS I COUNT TO 19" 
32 FOR X=1 TO 12: READ NO: GÜ SUB 42292: NEXT X: PAUSE 45 

37 FOR X=1 TO 16: READ NO: PRINT NO;" "3: GO SUB 4992: NEXT Xs 
PAUSE 43 

38 PRINT *"I CAN COUNT TO A MILLION IF I WANT TO" 

45 FOR X=1 TO iğ: READ NO: 60 SUB 4992: NEXT X: PAUSE 45 

42 CLS : PRINT "I AM THE COMPUTER, THIS HAPPENS TO BE MY NAME 


45 FOR X=1 TO ið: READ NO: 60 SUB 42692: NEXT X: PAUSE AB 

47 CLS 2 PRINT * "I CAN WATCH A PIXEL:" 

5% FOR X=1 TO 5: READ NO: GÜ SUB 4802: NEXT X: FOR X=-iø TO Ø: 
PLOT 127,4Ø+X: DRAW -989,X: NEXT X 

Si FOR X=-i@ TÜ @: PLOT INVERSE 1;127,48+X: DRAW INVERSE i;- 
Bö,X: NEXT X 

55 PRINT "LEFT" 

64 READ MÜ: 60 SUB 4982 

7% READ NO: 60 SUB 4992: FOR X=% TO ið: PLOT 127,4Øø+X: DRAW 59 
„X: NEXT X 

71 FOR X=@ TO 169: PLOT INVERSE 1;127,4@+X: DRAW INVERSE 1788 
„Ár NEXT X 

73 PRINT "RIGHT" 

Sö READ NO: 60 SUB 4992: PRINT "UP": FOR X=-iø TÜ 6: PLOT 1274 
X,77: DRAW X,7@: NEXT X | 

Bİ FOR X=-1Ø TÜ @: PLOT INVERSE 13127+X,77: DRAW INVERSE işX 
s70: NEXT X 

#6 READ NO: PRINT "AND DOWN": GÜ SUB 4222: READ NO: 60 SUB 406 
2: FOR X=% TÜ 16: PLOT 159+X,77: DRAW X,-76: NEXT X 

192 PAUSE 26: CLS : PRINT "BUT YOU DO NOT KNOW THIS,YOU ARE _— 
"£ FOR Xei TO ið: READ NO: 60 SUB 4992: NEXT X 

1125 STOP 
2666 INPUT "ENTER SENTENCE TO BE SPOKEN "şS$: LET 3$=S$+" " 
261% LET B=i: FOR X=1 TO LEN 5$ 
2626 IF S$€X TO X>=" " THEN LET NO=VAL S$€B TO X-i): 60 SUB 499 
2: LET B=X 
2656 NEXT X 
2468 STOP 
3999 REM ##ROUTINE TO DISPLAY LIBRARY#+# 
S065 LET VAm6S5922 
3618 LET NO=PEEK WA*256+PEEK (WA-1> 
3928 LET NL=PEEK (WA-2)*256+PEEK (WA-3) 
3939 PRINT NOs" “3 
3946 GÜ SUB 4962 
3459 LET WA=WA-4-NL 
396% IF WA>DW THEN 60 TO 3919 
3665 FRINT 
3878 RETURN 
4263 INPUT "enter # TO be spoken"şno 
4662 POKE 65924, INT (no/256): POKE 65923,no-(INT (no/256)*256) 
4003 LET dw=PEEK 65298*256+PEEK 65297: POKE dw, INT (no/256): POK 


4905 
4919 
5909 
5599 
£509 
7908 
7598 
7758 
ödü 
südü 
9013 


E dw-i,no-(INT (no/256)*256): POKE dw-2,6: POKE dw-3,1 


RANDOMIZE USR 65477: RETURN 
POKE 65Ø23, 1: GÜ SUB 4405: POKE 63523, 108: GÜ SUB 4665: STO 


SAVE "DEMO" 

60 SUB 8006 

PRINT AT 11,8; FLASH i;"READY TO VERIFY " 

VERIFY "" 

60 SUB 8998 

CLS : STOP 

SOUND Ø,4131,Ø;8,1337,62: PAUSE 5: SOUND 8,Ø;7,63: RETURN 
READ NO: GO SUB 4062: 60 TO 9999 

DATA 41,41,152,27,254,231,87,36,135,77,2,19,1,2,3,4,5,6,7,8 


» 9,19, 135, 63, 77,2, 16, 162, 136, 135, 252, 2, 135, 25, 231, 74, 236, 125, 2,4 
8,179,171,135,63, 254, 16, 187, 148, 27, 299, 249, 27, 95, 56, 273,89, 175, 1 
74, 236, 273, 34, 222 


